Imports Microsoft.ApplicationBlocks.Data.SqlHelper
Public Class Muestras

    Public Function ObtenerUltimaMuestra() As DataSet
        Dim DS As New DataSet
        DS = ExecuteDataset(My.Settings.MiCadena, CommandType.StoredProcedure, "MuestraUltimaObtener")
        Return DS
    End Function


End Class
